home *** CD-ROM | disk | FTP | other *** search
- global i
-
- on startMovie
- set mycursor to [1, 2]
- repeat with i = 11 to 18
- set the cursor of sprite i to mycursor
- end repeat
- set volset to the soundLevel
- if the soundEnabled = 0 then
- set the soundEnabled to 1
- end if
- end
-
- on doexit
- sound stop 1
- go("M2", "@::JMACMENU")
- end
-
- on crtopen1
- puppetSprite(7, 1)
- repeat while the stillDown
- set the memberNum of sprite 7 to 9
- updateStage()
- end repeat
- set the memberNum of sprite 7 to 8
- updateStage()
- puppetSprite(7, 0)
- end
-
- on crtopen2
- puppetSprite(8, 1)
- repeat while the stillDown
- set the memberNum of sprite 8 to 11
- updateStage()
- end repeat
- set the memberNum of sprite 8 to 10
- updateStage()
- puppetSprite(8, 0)
- end
-
- on crtclose
- puppetSprite(9, 1)
- repeat while the stillDown
- set the memberNum of sprite 9 to 13
- updateStage()
- end repeat
- set the memberNum of sprite 9 to 12
- updateStage()
- puppetSprite(9, 0)
- end
-
- on crtnext1
- puppetSprite(20, 1)
- repeat while the stillDown
- set the memberNum of sprite 20 to 23
- updateStage()
- end repeat
- set the memberNum of sprite 20 to 22
- updateStage()
- puppetSprite(20, 0)
- puppetSprite(1, 0)
- end
-
- on crtback1
- puppetSprite(21, 1)
- repeat while the stillDown
- set the memberNum of sprite 21 to 25
- updateStage()
- end repeat
- set the memberNum of sprite 21 to 24
- updateStage()
- puppetSprite(21, 0)
- puppetSprite(1, 0)
- end
-
- on crtnext2
- puppetSprite(20, 1)
- repeat while the stillDown
- set the memberNum of sprite 20 to 40
- updateStage()
- end repeat
- set the memberNum of sprite 20 to 39
- updateStage()
- puppetSprite(20, 0)
- puppetSprite(1, 0)
- end
-
- on crtback2
- puppetSprite(21, 1)
- repeat while the stillDown
- set the memberNum of sprite 21 to 42
- updateStage()
- end repeat
- set the memberNum of sprite 21 to 41
- updateStage()
- puppetSprite(21, 0)
- puppetSprite(1, 0)
- end
-
- on crtzoomin
- puppetSprite(23, 1)
- repeat while the stillDown
- set the memberNum of sprite 23 to 29
- updateStage()
- end repeat
- set the memberNum of sprite 23 to 28
- updateStage()
- puppetSprite(23, 0)
- end
-
- on crtzoomout
- puppetSprite(23, 1)
- repeat while the stillDown
- set the memberNum of sprite 23 to 31
- updateStage()
- end repeat
- set the memberNum of sprite 23 to 30
- updateStage()
- puppetSprite(23, 0)
- puppetSprite(1, 0)
- end
-
- on crtexit1
- puppetSprite(22, 1)
- repeat while the stillDown
- set the memberNum of sprite 22 to 27
- updateStage()
- end repeat
- set the memberNum of sprite 22 to 26
- updateStage()
- puppetSprite(22, 0)
- end
-
- on crtexit2
- puppetSprite(22, 1)
- repeat while the stillDown
- set the memberNum of sprite 22 to 44
- updateStage()
- end repeat
- set the memberNum of sprite 22 to 43
- updateStage()
- puppetSprite(22, 0)
- end
-